home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue54 / Alfresco / TstCrypU.dfm / TstCrypU.txt
Text File  |  1999-12-12  |  2KB  |  118 lines
  1. object Form1: TForm1
  2.   Left = 192
  3.   Top = 116
  4.   Width = 418
  5.   Height = 454
  6.   Caption = 'Form1'
  7.   Font.Color = clWindowText
  8.   Font.Height = -11
  9.   Font.Name = 'MS Sans Serif'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   Position = poScreenCenter
  13.   OnCreate = FormCreate
  14.   TextHeight = 13
  15.   object Label1: TLabel
  16.     Left = 16
  17.     Top = 16
  18.     Width = 35
  19.     Height = 13
  20.     Caption = 'Original'
  21.   end
  22.   object Label2: TLabel
  23.     Left = 16
  24.     Top = 152
  25.     Width = 48
  26.     Height = 13
  27.     Caption = 'Encrypted'
  28.   end
  29.   object Label3: TLabel
  30.     Left = 16
  31.     Top = 288
  32.     Width = 49
  33.     Height = 13
  34.     Caption = 'Decrypted'
  35.   end
  36.   object Label4: TLabel
  37.     Left = 237
  38.     Top = 232
  39.     Width = 18
  40.     Height = 13
  41.     Caption = 'Key'
  42.   end
  43.   object Label5: TLabel
  44.     Left = 237
  45.     Top = 176
  46.     Width = 55
  47.     Height = 13
  48.     Caption = 'Caesar shift'
  49.   end
  50.   object mOriginal: TMemo
  51.     Left = 16
  52.     Top = 32
  53.     Width = 200
  54.     Height = 100
  55.     TabOrder = 0
  56.     WantReturns = False
  57.   end
  58.   object mEncrypted: TMemo
  59.     Left = 16
  60.     Top = 168
  61.     Width = 200
  62.     Height = 100
  63.     TabStop = False
  64.     Enabled = False
  65.     TabOrder = 1
  66.   end
  67.   object mDecrypted: TMemo
  68.     Left = 16
  69.     Top = 304
  70.     Width = 200
  71.     Height = 100
  72.     TabStop = False
  73.     Enabled = False
  74.     TabOrder = 2
  75.   end
  76.   object RadioGroup1: TRadioGroup
  77.     Left = 237
  78.     Top = 32
  79.     Width = 161
  80.     Height = 113
  81.     Caption = 'Select cipher'
  82.     ItemIndex = 0
  83.     Items.Strings = (
  84.       'Caesar cipher'
  85.       'Vigen∩┐╜re cipher'
  86.       'ADFGVX cipher'
  87.       'XOR cipher')
  88.     TabOrder = 3
  89.     OnClick = RadioGroup1Click
  90.   end
  91.   object edtKey: TEdit
  92.     Left = 237
  93.     Top = 248
  94.     Width = 161
  95.     Height = 21
  96.     Enabled = False
  97.     TabOrder = 4
  98.   end
  99.   object edtCaesarShift: TEdit
  100.     Left = 237
  101.     Top = 192
  102.     Width = 161
  103.     Height = 21
  104.     TabOrder = 5
  105.     Text = '3'
  106.   end
  107.   object Button1: TButton
  108.     Left = 323
  109.     Top = 376
  110.     Width = 75
  111.     Height = 25
  112.     Caption = 'Do it!'
  113.     Default = True
  114.     TabOrder = 6
  115.     OnClick = Button1Click
  116.   end
  117. end
  118.